<script>on mouseUpglobal theThresholdif the freesize of this stack > theThreshold thendomenu "compact stack"elsebeepanswer "This stack does not need to be compacted."end ifbeepanswer "Make a back up copy of this stack?" with "No" or "Yes"if it is "No" then exit mouseupdomenu "save a copy..."end mouseUp</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>41</left>
<top>312</top>
<right>149</right>
<bottom>341</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>New York</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Listen to SMPTE</name>
<script>on mouseUpplay "smpte.long"answer "SMPTE Time Code: a square wave varying in frequency between " & ¬"1.2KHz (binary 0) and 2.4 KHz (binary 1)." with "Play Again" or "OK"if it is "Play Again" then click at the loc of meend mouseUp</script>
<script>on mouseuplock screenput the scroll of bg fld "info1" into theSavedScrollset the scroll of bg fld "info1" to 30000click at 425,82put the scroll of bg fld "info1" into line 1 of meset the scroll of bg fld "info1" to theSavedScrollunlock screenend mouseup</script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>5</left>
<top>74</top>
<right>434</right>
<bottom>302</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>New York</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<textHeight>24</textHeight>
<name>Info1</name>
<script></script>
</part>
<part>
<id>13</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>435</left>
<top>74</top>
<right>511</right>
<bottom>92</bottom>
</rect>
<style>checkbox</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Auto-Scroll</name>
<script>on mouseUpglobal autoScrollput the hilite of me into autoScrollend mouseUp</script>
</part>
<part>
<id>14</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>3</left>
<top>27</top>
<right>161</right>
<bottom>48</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name></name>
<script>on mouseUpif the optionkey is down thenset the visible of bg fld "maxScroll" to not the visible of bg fld "Maxscroll"end ifend mouseUp</script>
</part>
<part>
<id>15</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>435</left>
<top>94</top>
<right>511</right>
<bottom>112</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>Reset Scroll</name>
<script>on mouseUpset the scroll of bg fld "info1" to 0end mouseUp</script>
</part>
<name>topics</name>
<script>on FindTheMaxScroll-- • Find the Maximum Scroll of a field •set the cursor to watchlock screenset the scroll of bg fld "info1" to 30000click at 425,82 -- • Coordinates of top arrow of field •put the scroll of bg fld "info1" into line 1 of bg fld "MaxScroll"set the scroll of bg fld "info1" to 0unlock screen with dissolveset the cursor to handend FindTheMaxScroll-- •••••••••••••••••••••••••••••••••on opencardglobal autoScrollunlock screen with dissolveput the hilite of bg btn "Auto-Scroll" into autoScrollif autoScroll = true thenFindTheMaxScroll -- make sure we're updated!!!end ifend opencard-- •••••••••••••••••••••••••••••••••on closecardlock screenset the scroll of bg fld "info1" to 0end closecard-- •••••••••••••••••••••••••••••••••on idleglobal autoscrollif autoScroll is false then exit idleif bg fld "MaxScroll" = 0 then FindTheMaxScrollif the scroll of bg fld "info1" < bg fld "MaxScroll" thenset the scroll of bg fld "info1" to ¬(the scroll of bg fld "info1" + 1)end ifend idle</script>